********************************************************************************
*THE FILE INTERACTS TIME DUMMIES (NUMD 1 OR 12) WITH LISTED VARIABLES 
********************************************************************************
type RO_tdintera.do
args numd varlist

noisily disp "Use quotes to embrace variable list"
	
local list `varlist'
if `numd'==1 {
	noisily dis "Making announcement interaction"
	foreach var of loc list {
	gen dT7`var'=dT7*`var'
}
}
 
if `numd'==12 {
	noisily dis "Making 12-month window interactions"
	foreach x of numlist 1 2 3 4 5 7 8 9 10 11 12 {
	foreach var of loc list {
	gen dT`x'`var'=dT`x'*`var'
}
}
}
